<script>on openCardhide menuBarhide msgglobal id,puker,hx,vxif puker is empty then put false into pukerhSet 5vSet 5set the icon of button"prince" to idset the visible of button"prince" to (not puker)set the cursor to noneset the loc of button "Prince" to the mouseLocrepeat until the mouse is "down" and (puker is false or the shiftKey¬is down)if puker is false then moveMeend repeatvisual dissolvepop cardshow menuBarend openCardon moveMeglobal hx,vxput item 1 of the loc of btn"prince" into chif ch≥512 or ch≤0 then hSet chput item 2 of the loc of btn"prince" into cvif cv≥342 or cv≤0 then vSet cvrepeat until hx≠0 or vx≠0hSet chend repeatshow btn"prince" at ch+hx,cv+vxend moveMeon hSet chglobal hxif ch≤0 thenput (the random of 11)-1 into hxelseput -((the random of 11)-1) into hxend ifend hSeton vSet cvglobal vxif cv≤0 thenput (the random of 11)-1 into vxelseput -((the random of 11)-1) into vxend ifend vSet</script>
</card>
card_3237.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<text> MegaHome™ II 0 of 10/4/90 by Roger PlyerIf you like MegaHome™, which is shareware, please send $15 (or whatever you think it’s worth) to:Roger Plyer3813 Windber Blvd.Palm Harbor, FL 34685 CLICK TO GO ON</text>
</content>
<content>
<layer>card</layer>
<id>4</id>
<text> MegaHome™ CreditsMegaHome & Icons — Roger PlyerShutDown XCMD — Will CateDoRestart XCMD — Jim HendersonFileName XFCN — Steve MallerHPopupMenu XFCN — Guy de PicciotoRenameFile XFCN — Dewi Williamsßeta Testing — Andy Boie & Many Others CLICK TO GO ON</text>
</content>
<name>About</name>
<script></script>
</card>
card_5173.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<text>DraggingCoordinates(-Open(-RenameNew Icon(-Add an applicationRemove an application,Remove selected application,Remove an application,Remove all applications(-Add a cardRemove this card(-Clean up,Clean up all,(-,Clean up selection,Place selection,(-,Rebuild alignment dataDeselect</text>
</content>
<content>
<layer>background</layer>
<id>48</id>
<text>2:34 PM</text>
</content>
<content>
<layer>background</layer>
<id>47</id>
<text>Mouse:0,0</text>
</content>
<content>
<layer>background</layer>
<id>8</id>
<text>1</text>
</content>
<name>ApplicationLauncher1</name>
<script></script>
</card>
card_7613.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseUpif trapDoubleClick(the rect of me) is true thenbeep 2answer"Do you really want to reset the accesses?" with¬"OK" or "Cancel"if it is "OK" then put "1" into line 2 of meend ifend mouseUpon mouseStillDowndragTarget (me)end mouseStillDown</script>